//
// io_service_pool.cpp
// ~~~~~~~~~~~~~~~~~~~
//
// Copyright (c) 2003-2012 Christopher M. Kohlhoff (chris at kohlhoff dot com)
//
// Distributed under the Boost Software License, Version 1.0. (See accompanying
// file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
//

#include "server.hpp"
#include <stdexcept>
#include <boost/thread/thread.hpp>
#include <boost/bind.hpp>
#include <boost/shared_ptr.hpp>
#include "io_service_pool.hpp"


#define MAX_EVENTS 128 /*Max. number of events to process at one go*/
#define MAX_FILE_NAME_LEN 32 /*Assuming that the length of the filename won't exceed 16 bytes*/
#define EVENT_SIZE  ( sizeof (struct inotify_event) ) /*size of one event*/
#define BUF_LEN     ( MAX_EVENTS * ( EVENT_SIZE + MAX_FILE_NAME_LEN )) /*buffer to store the data of events*/
#define __READY_TIME_BEFORE_LOADING 5 // seconds
#define __WATCHED_DIRECTORY1 "biz-code/preload"
#define __WATCHED_DIRECTORY2 "biz-code/biz"

namespace http {
    namespace server3 {

        io_service_pool::io_service_pool(std::size_t pool_size)
            : next_io_service_(0)
        {
            if (pool_size == 0)
                throw std::runtime_error("io_service_pool size is 0");

            // Give all the io_services work to do so that their run() functions will not
            // exit until they are explicitly stopped.
            // There is an association between one io_service and one corresponding lua_interface
            for (std::size_t i = 0; i < pool_size; ++i)
            {
                io_service_ptr io_service_ptr_(new boost::asio::io_service);
                work_ptr work(new boost::asio::io_service::work(*io_service_ptr_));
                work_.push_back(work);
                io_services_.push_back(io_service_ptr_);

                request_handler_ptr request_handler_ptr_(new request_handler);
                request_handlers_.push_back(request_handler_ptr_);
            }
        }

        void io_service_pool::run()
        {
            // Create a pool of threads to run all of the io_services.
            std::vector<boost::shared_ptr<boost::thread> > threads;
            for (std::size_t i = 0; i < io_services_.size(); ++i)
            {
                boost::shared_ptr<boost::thread> thread(new boost::thread(
                    boost::bind(&boost::asio::io_service::run, io_services_[i])));
                threads.push_back(thread);
            }

            boost::shared_ptr<boost::thread> dir_monitor_thread(new boost::thread(
                            boost::bind(&io_service_pool::reloadLuaScripts,this)));

            //dir_monitor_thread->join();

            // Wait for all threads in the pool to exit.
            for (std::size_t i = 0; i < threads.size(); ++i)
                threads[i]->join();

        }

        void io_service_pool::stop()
        {
            // Explicitly stop all io_services.
            for (std::size_t i = 0; i < io_services_.size(); ++i)
                io_services_[i]->stop();
        }

        io_service_pool::io_handler_pair io_service_pool::get_io_handler()
        {
            // Use a round-robin scheme to choose the next io_service to use.
            io_service_pool::io_handler_pair result = std::make_pair(
                        boost::ref(*io_services_[next_io_service_]),
                        boost::ref(*request_handlers_[next_io_service_]));
            ++next_io_service_;
            if (next_io_service_ == io_services_.size())
                next_io_service_ = 0;
            return result;
        }

        void io_service_pool::reloadLuaScripts()
        {
            int fd, wd1, wd2;
            char buffer[BUF_LEN];
            /* Initialize Inotify*/
            fd = inotify_init();
            if ( fd < 0 ) perror( "Couldn't initialize inotify");
            /* add watch to starting directory */
            //wd1 = inotify_add_watch(fd, __WATCHED_DIRECTORY1, IN_CREATE | IN_MODIFY | IN_DELETE);
            wd2 = inotify_add_watch(fd, __WATCHED_DIRECTORY2, IN_CREATE | IN_MODIFY | IN_DELETE);
            //if (wd1 == -1) printf("Couldn't add watch to %s\n",__WATCHED_DIRECTORY1);
            if (wd2 == -1) printf("Couldn't add watch to %s\n",__WATCHED_DIRECTORY2);

            /* do it forever*/
            while(1)
              {
                //perror("Ready ... ");
                sleep(__READY_TIME_BEFORE_LOADING);
                read(fd, buffer,  BUF_LEN);
                for (std::size_t i = 0; i < io_services_.size(); ++i)
                {
                    boost::reference_wrapper<LuaInterface> wrapped_lua_ = request_handlers_[i]->get_lua_interface();
                    wrapped_lua_.get().lockLVM();
                    wrapped_lua_.get().createNewCoroutine();
                    wrapped_lua_.get().unlockLVM();
                }
              }

            /* Clean up*/
            inotify_rm_watch( fd, wd1 );
            //inotify_rm_watch( fd, wd2 );
            close( fd );
        }

    } // namespace server2
} // namespace http
